R-state(R;i)
== case R of
== Rnone => == Rplus(left,right)=>rec1,rec2.rec1rec2 == Rinit(loc,T,x,v)=> if loc = i then x : T else fi
== Rframe(loc,T,x,L)=> if loc = i then x : T else fi
== Rsframe(lnk,tag,L)=> == Reffect(loc,ds,knd,T,x,f)=> if loc = i then ds else fi
== Rsends(ds,knd,T,l,dt,g)=> if source(l) = i then ds else fi
== Rpre(loc,ds,a,T,P)=> if loc = i then ds else fi
== Rkframe(loc,k,L)=> == Rksframe(loc,k,L)=> == Rrframe(loc,x,L)=>
R-state(R;i)
== case R of
== Rnone => == Rplus(left,right)=>rec1,rec2.fpf-join(IdDeq;rec1;rec2)
== Rinit(loc,T,x,v)=> if loc = i then x : T else fi
== Rframe(loc,T,x,L)=> if loc = i then x : T else fi
== Rsframe(lnk,tag,L)=> == Reffect(loc,ds,knd,T,x,f)=> if loc = i then ds else fi
== Rsends(ds,knd,T,l,dt,g)=> if source(l) = i then ds else fi
== Rpre(loc,ds,a,T,P)=> if loc = i then ds else fi
== Rkframe(loc,k,L)=> == Rksframe(loc,k,L)=> == Rrframe(loc,x,L)=>